% Ejercicio 7

mujer( mabel ).
mujer( ana ).
mujer( mara ).

hombre( pablo ).
hombre( juan ).
hombre( adrian ).

atrae( mabel, rosa ).
atrae( ana, rosa ).

atrae( mara, celeste ).
atrae( mara, lila ).

pastel( rosa ).
pastel( lila ).
pastel( celeste ).

atrae( juan, C ) :- pastel( C ).

atrae( M, azul ) :- mujer( M ).
atrae( pablo, azul ).

atrae( H, rojo ) :- hombre( H ), mayor( H ).
atrae( mabel, rojo ).

atrae( P, amarillo ) :- porteno( P ).
atrae( adrian, amarillo ).

atrae( ana, naranja ).
atrae( juan, naranja ).

porteno( mara ).
porteno( mabel ).
porteno( pablo ).

mayor( ana ).
mayor( pablo ).

% agregado 1

asiste( mabel, viernes ).
asiste( ana, viernes ).
asiste( adrian, viernes ).
asiste( pablo, viernes ).

asiste( mara, sabado ).
asiste( mabel, sabado ).
asiste( adrian, sabado ).
asiste( juan, sabado ).

asiste( juan, domingo ).
asiste( P, domingo ) :- mayor( P ).

ilumina( C, D ) :- mujer(M), hombre(H), asiste(M,D), asiste(H,D), atrae(H,C), atrae(M,C).